home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mac Magazin/MacEasy 25
/
Mac Magazin and MacEasy Magazine CD - Issue 25.iso
/
Grafik & Text
/
Alpha
/
Tcl
/
ElectricAlias
/
Aliases
/
aliases.Ada
< prev
next >
Wrap
Text File
|
1995-07-16
|
2KB
|
41 lines
#
# Raymond Waldrop <rwaldrop@cs.tamu.edu>
# aliases for Ada mode
#
electricAlias-def •Ada •Ada •Ada
electricAlias-var Ada bb ""
electricAlias-var Ada eb ""
electricAlias-var Ada bc "--"
electricAlias-var Ada ec ""
electricAlias-def •Ada beg "\bbegin\r•"
electricAlias-def •Ada begin "\bbegin\r•"
electricAlias-def •Ada case "case • is\r\t\t•\rend case;\r~"
electricAlias-def •Ada endif "\bend if;\r\b•"
electricAlias-def •Ada end "\bend •"
electricAlias-def •Ada entry "entry •\r (•)\r\twhen • is\r\t•\rend •;"
electricAlias-def •Ada for "for • in • loop\r\t•\rend loop;\r~"
electricAlias-def •Ada func "function • return • is\r\t•\rbegin\r\t•\rend •;\r~"
electricAlias-def •Ada function "function • return • is\r\t•\rbegin\r\t•\rend •;\r~"
electricAlias-def •Ada gen "generic\r\t•\r~"
electricAlias-def •Ada generic "generic\r\t•\r~"
electricAlias-def •Ada if "if • then \r\t•\rend if;\r~"
electricAlias-def •Ada loop "loop\r\t•\r\end loop;\r~"
electricAlias-def •Ada or "\bor\r•"
electricAlias-def •Ada pack "package • is\r\t•\rend •;\r~"
electricAlias-def •Ada package "package • is\r\t•\rend •;\r~"
electricAlias-def •Ada private "\bprivate\r•"
electricAlias-def •Ada proc "procedure • is \r\t• \rbegin\r\t•\rend •;\r~"
electricAlias-def •Ada procedure "procedure • is \r\t• \rbegin\r\t•\rend •;\r~"
electricAlias-def •Ada prot "protected • is\r\t•\rend •;\r~"
electricAlias-def •Ada protected "protected • is\r\t•\rend •;\r~"
electricAlias-def Ada rci "Remote_Call_Interface"
electricAlias-def •Ada sel "select\r\t•\rend select;\r~"
electricAlias-def •Ada select "select\r\t•\rend select;\r~"
electricAlias-def •Ada sub "subtype • is •"
electricAlias-def •Ada subtype "subtype • is •"
electricAlias-def •Ada task "task • is\r\t•\rend •;\r~"
electricAlias-def •Ada thab "\bthen abort\r•"
electricAlias-def •Ada type "type • is •"
electricAlias-def •Ada when "\bwhen • =>\r•"
electricAlias-def •Ada while "while • loop\r\t•\r\end loop;\r~"